home *** CD-ROM | disk | FTP | other *** search
/ The See Clearly Method / TheSeeClearlyMethod.iso / Media / howtogetstarted.dir / 00023_FW Rollover Member Change.ls < prev    next >
Encoding:
Text File  |  2002-05-14  |  1.2 KB  |  46 lines
  1. property spriteNum, mySprite, myStandardMember, myRollovermember
  2.  
  3. on getBehaviorDescription me
  4.   return "ROLLOVER MEMBER CHANGE" & RETURN & RETURN & "Change the sprite's cast member when the mouse rolls over the sprite." & RETURN & RETURN & "PARAMETERS:" & RETURN & "* Rollover cast member"
  5. end
  6.  
  7. on getBehaviorTooltip me
  8.   return "Use with graphic members." & RETURN & RETURN & "Swaps a sprite's cast member on rollover."
  9. end
  10.  
  11. on beginSprite me
  12.   mySprite = sprite(me.spriteNum)
  13.   myStandardMember = mySprite.member
  14.   if myRollovermember = 0 then
  15.     myRollovermember = member(mySprite.member.number + 1)
  16.   end if
  17. end
  18.  
  19. on mouseEnter me
  20.   mySprite.member = myRollovermember
  21.   cursor(280)
  22. end
  23.  
  24. on mouseLeave me
  25.   mySprite.member = myStandardMember
  26.   cursor(0)
  27. end
  28.  
  29. on isOKToAttach me, aSpriteType, aSpriteNum
  30.   case aSpriteType of
  31.     #graphic:
  32.       return 1
  33.     #script:
  34.       return 0
  35.   end case
  36. end
  37.  
  38. on getPropertyDescriptionList
  39.   if the currentSpriteNum = 0 then
  40.     exit
  41.   end if
  42.   theMember = sprite(the currentSpriteNum).member
  43.   theMemberNumber = theMember.number
  44.   return [#myRollovermember: [#comment: "Display which member on rollover?", #format: #graphic, #default: member(theMemberNumber + 1)]]
  45. end
  46.